home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d14
/
baswind8.arc
/
MAKELIB.BAT
< prev
next >
Wrap
DOS Batch File
|
1990-09-14
|
6KB
|
212 lines
ECHO OFF
CLS
ECHO QuickBASIC WINDOW TOOLS Version 8.0 , SEPT 1990
ECHO
ECHO BY: James P. Morgan, 5226 Via Hacienda #115, Orlando Fl, 32809, U.S.A.
ECHO
REM You need to be in the same directory as QuickBasic 4.5 or have
REM a PATH= pointing to its sub-directory.
REM
ECHO
ECHO
ECHO ** Creating the .OBJ files of BASWIND for the '.SUB' sub-programs.
ECHO
BC BARMENU.SUB/O/S; >$$WIND.TXT
REM you can add any ERRORLEVEL checking as you see fit
BC CALENDAR.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC CALENDR3.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC CAUTION.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC FULLMENU.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC KEYCAL.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC MAKEWIND.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC MENU123.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC POPDIR.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC POPLIST.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC POPMENU.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC QUESTION.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC ROW25.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC SCROLL.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC SETQUAD.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC TAGDIR.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC TAGLIST.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC TITLE.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC WAIT.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC WARNING.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
BC QUERY.SUB /O/S; >>$$WIND.TXT
IF ERRORLEVEL 1 ECHO ERROR during compile of .SUB modules
IF ERRORLEVEL 1 GOTO ABORT
ECHO
ECHO
ECHO ** Creating/Replacing the WINDQB45 object library from the object modules.
ECHO
pause
REM LIB does a 'replace' of the module , so dont worry about an 'error'
REM message the first time you 'add/replace' a module.
LIB windqb45-+BARMENU; >>$$WIND.TXT
LIB windqb45-+CALENDAR; >>$$WIND.TXT
LIB windqb45-+CALENDR3; >>$$WIND.TXT
LIB windqb45-+CAUTION; >>$$WIND.TXT
LIB windqb45-+FULLMENU; >>$$WIND.TXT
LIB windqb45-+KEYCAL; >>$$WIND.TXT
LIB windqb45-+MAKEWIND; >>$$WIND.TXT
LIB windqb45-+MENU123; >>$$WIND.TXT
LIB windqb45-+POPDIR; >>$$WIND.TXT
LIB windqb45-+POPLIST; >>$$WIND.TXT
LIB windqb45-+POPMENU; >>$$WIND.TXT
LIB windqb45-+QUESTION; >>$$WIND.TXT
LIB windqb45-+ROW25; >>$$WIND.TXT
LIB windqb45-+SCROLL; >>$$WIND.TXT
LIB windqb45-+SETQUAD; >>$$WIND.TXT
LIB windqb45-+TAGDIR; >>$$WIND.TXT
LIB windqb45-+TAGLIST; >>$$WIND.TXT
LIB windqb45-+TITLE; >>$$WIND.TXT
LIB windqb45-+WAIT; >>$$WIND.TXT
LIB windqb45-+WARNING; >>$$WIND.TXT
LIB windqb45-+QUERY; >>$$WIND.TXT
REM Delete the .OBJ modules as part of cleanup, you will need to delete a
REM WINDQB45.BAK also, that was created by LIB.
ECHO
ECHO
ECHO ** Deleting the .OBJ modules created by the standalone QuickBasic compiler
ECHO
pause
DEL BARMENU.OBJ >NUL
DEL CALENDAR.OBJ >NUL
DEL CALENDR3.OBJ >NUL
DEL CAUTION.OBJ >NUL
DEL FULLMENU.OBJ >NUL
DEL KEYCAL.OBJ >NUL
DEL MAKEWIND.OBJ >NUL
DEL MENU123.OBJ >NUL
DEL POPDIR.OBJ >NUL
DEL POPLIST.OBJ >NUL
DEL POPMENU.OBJ >NUL
DEL QUESTION.OBJ >NUL
DEL ROW25.OBJ >NUL
DEL SCROLL.OBJ >NUL
DEL SETQUAD.OBJ >NUL
DEL TAGDIR.OBJ >NUL
DEL TAGLIST.OBJ >NUL
DEL TITLE.OBJ >NUL
DEL WAIT.OBJ >NUL
DEL WARNING.OBJ >NUL
DEL QUERY.OBJ >NUL
REM You need to be in the same directory as MASM or have a
REM PATH= pointing to its sub-directory.
REM
ECHO
ECHO
ECHO ** Creating the .OBJ files of BASWIND from the '.ASM' programs.
ECHO
pause
MASM DIR; >>$$WIND.TXT
MASM FASTPRT; >>$$WIND.TXT
MASM INT86; >>$$WIND.TXT
MASM MOUSE; >>$$WIND.TXT
MASM NEWSCRN; >>$$WIND.TXT
MASM RESTWIND; >>$$WIND.TXT
MASM SAVEWIND; >>$$WIND.TXT
ECHO
ECHO
ECHO ** Creating/Replacing the WINDQ45 object library from the object modules.
ECHO
REM LIB does a 'replace' of the module , so dont worry about an 'error'
REM message the first time you 'add/replace' a module.
lib windqb45-+dir; >>$$WIND.TXT
lib windqb45-+fastprt; >>$$WIND.TXT
lib windqb45-+int86; >>$$WIND.TXT
lib windqb45-+mouse; >>$$WIND.TXT
lib windqb45-+newscrn; >>$$WIND.TXT
lib windqb45-+restwind; >>$$WIND.TXT
lib windqb45-+savewind; >>$$WIND.TXT
ECHO
ECHO
ECHO ** Deleting the .OBJ modules created by the MASM assembler
ECHO
pause
DEL DIR.OBJ >NUL
DEL FASTPRT.OBJ >NUL
DEL INT86.OBJ >NUL
DEL MOUSE.OBJ >NUL
DEL NEWSCRN.OBJ >NUL
DEL RESTWIND.OBJ >NUL
DEL SAVEWIND.OBJ >NUL
CLS
GOTO END
:ABORT
ECHO
ECHO Error occured, please check the $$WIND.TXT file !!!
:END